From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Mon, 27 Oct 2003 15:20:46 +0000 (+0000)
Subject: (reindent-then-newline-and-indent): Delete space *after*
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~25110
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1226e0a2e1d251d398d50792f22f880d43d2ba2c;p=emacs.git

(reindent-then-newline-and-indent): Delete space *after*
reindenting the first line.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index b0d5f7295f9..3d636de721a 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -303,14 +303,14 @@ In programming language modes, this is the same as TAB.
 In some text modes, where TAB inserts a tab, this indents to the
 column specified by the function `current-left-margin'."
   (interactive "*")
-  (delete-horizontal-space t)
   (let ((pos (point)))
     ;; Be careful to insert the newline before indenting the line.
     ;; Otherwise, the indentation might be wrong.
     (newline)
     (save-excursion
       (goto-char pos)
-      (indent-according-to-mode))
+      (indent-according-to-mode)
+      (delete-horizontal-space t))
     (indent-according-to-mode)))
 
 (defun quoted-insert (arg)